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SECTION  I 


INTRODUCTION 


An  in-stack  diffusion  classifier  was  field  tested  at  Tyndall  Air 
Force  Base,  Panama  City,  Florida.  Particle  size  distribution  measurements 
were  made  on  the  exhaust  stream  from  the  engine  test  cell  while  running 
a  J75  P17  jet  engine.  Field  sampling  took  place  from  2-4  September 
1980.  It  was  again  attempted  on  9-11  September  1980. 

The  particle  size  distribution  of  the  J75  jet  engine  exhaust  was 
measured  using  a  University  of  Washington  in-stack  cascade  impactor 
followed,  in  series,  by  an  in-stack  diffusion  classifier  recently  developed 
at  the  University  of  Florida.  In  addition,  total  particulate  samples 
were  obtained  using  absolute  filters  to  determine  particulate  mass 
concentration  in  the  exhaust  gases.  Whenever  possible,  opacity  readings 
of  the  plume  were  also  taken  during  sampling. 

During  the  first  testing  period  (2-4  September  1980) ,  sampling  was 
performed  on  a  J75  engine,  serial  #610497.  This  type  of  engine  has  a 
thrust  of  13,000  pounds  at  military  power.  The  engine  was  tested  at 
operating  conditions  from  80  to  100  percent  power.  Testing  had  to  be 
terminated  on  4  September  1980  because  the  engine  was  needed  on  the 
flightline.  No  other  engine  was  available  for  testing  at  the  time,  so 
the  test  team  left  Panama  City. 

Data  collected  during  the  first  sampling  period  was  not  sufficient 
to  generate  a  reasonable  estimate  of  the  jet  exhaust  aerosol  size  distribution. 
The  general  problems  encountered  are  discussed  in  Section  II,  Test 
Procedures . 

A  second  sampling  session  was  attempted  9-11  September  1980. 

However,  due  to  engine  test  scheduling  problems,  beyond  the  control  of 
testing  personnel,  no  engine  was  available  to  test.  Despite  efforts  to 
locate  a  suitable  engine,  none  was  available.  While  waiting  for  a  test 
engine,  numerous  quality  checks  were  performed  by  the  test  team  to 
assure  chat  weighing  and  handling  techniques  were  not  biasing  the  measurements 
in  any  way.  The  checks  completed  and  the  results  obtained  are  discussed 
in  Section  III. 

On  11  September  1980,  it  was  learned  from  the  Air  Force  personnel 
in  charge-  of  engine  testing  that  there  was  little  chance  of  receiving  an 
engine  in  time  to  test  that  week.  A  decision  was  then  made  to  abort  the 
testing.  The  test  team  returned  to  Gainesville. 


SECTION  II 
TEST  PROCEDURES 


The  outlet  of  the  test  cell  was  measured  and  then  traversed  for  gas 
velocity  and  temperature  along  5  of  its  15  channels.  The  measurements 
were  done  at  80  percent  power.  The  data  was  averaged  to  obtain  values 
for  calculating  nozzle  size  and  selecting  a  suitable  sampling  point. 

The  measured  data  along  with  averages  are  given  in  Table  1.  A  1/4-inch- 
diameter  nozzle  was  chosen  as  the  closest  available  to  the  ideal  diameter 
calculated  at  0.17  inch.  The  sampling  point  chosen  was  42  inches  into 
channel  No.  8.  This  sampling  point  was  used  throughout  the  entire  set 
of  runs. 

University  of  Washington  Impactor  substrates  were  prepared  and 
conditioned  at  350  F  in  the  Gainesville  laboratory  prior  to  transport  to 
the  test  site.  Coatings  used  for  each  test  run  are  listed  on  the  data 
sheets  (Appendix  B) . 

All  weighing  was  done  on  site  in  laboratory  space  supplied  by  the 
Air  Force.  Substrates  were  weighed  immediately  prior  to  use  on  a  Cahn 
electrobalance.  The  impactor  and  diffusion  classifier  were  then  immediately 
assembled  with  the  tared  substrates.  Assembly  of  the  diffusion  battery 
is  described  in  Appendix  A.  The  University  of  Washington  Impactor  was 
assembled  according  to  manufacturer's  specifications. 

In  addition  to  the  impactor  and  diffusion  classifier,  the  sampling 
apparatus  included  an  EPA  Method  5  type  meter  box.  Several  stainless 
steel  Gelman  filter  holders,  with  appropriate  size  glass  fiber  filters, 
were  also  used  for  the  total  particle  samples. 

The  selected  nozzle  was  attached  to  the  inlet  of  the  impactor.  The 
impactor  was  followed  by  the  diffusion  classifier,  stainless  steel  pipe, 
flexible  tubing,  condenser  unit,  and  the  EPA  Method  5  meter  box. 

After  the  equipment  was  moved  to  the  test  cell  scaffolding,  the 
inlet  of  the  impactor  was  plugged  and  the  sampling  unit  placed  into  the 
hot  gas  stream  for  heating  to  gas  stream  temperature.  After  a  30-minute 
warm-up  period,  during  which  time  a  total  particulate  matter  filter 
sample  was  obtained,  the  diffusion  classifier  assembly  was  unplugged  and 
run.  Normal  testing  time  was  30  minutes,  but  this  was  shortened  to  15 
minutes  at  100  percent  power  to  prevent  strain  on  the  jet  engine.  The 
diffusion  classifier  assembly  was  run  with  the  meter  box  vacuum  gauge 
set  at  17  inches  of  mercury.  This  allowed  the  matched  critical  orifices 
in  the  diffusion  classifier  to  go  critical  and  thus  maintain  a  constant 
flow  through  the  sampling  system.  Field  data  sheets  are  Included  for 
each  run  in  Appendix  B. 

At  the  end  of  the  run,  the  equipment  was  returned  to  the  on-site 
laboratory  for  weighing.  While  still  hot,  the  diffusion  classifier  was 
disassembled.  This  was  done  in  an  effort  to  eliminate  sticking  of  the 
fiber  filters  to  metal  parts  of  the  stages. 
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TABLE  1.  SAMPLING  POINT  GRID  FOR  THE  OUTLET  OF  J75  ENGINE  TEST  CELL 


Channel  No. 

13 

10 

8 

6 

3 

Inches  into  Channel 

190 

190 

185 

180 

200 

Temperature  (°F) 

6 

0.95 

0.56 

0.41 

0.46 

0.65 

Velocity  (in.  ^0) 

200 

190 

180 

185 

200 

Temperature  (°F) 

12 

1.4 

1.3 

1.6 

1.5 

0.98 

Velocity  (in.  H20) 

200 

200 

190 

190 

200 

Temperature  (°F) 

18 

1.1 

1.5 

1.9 

1.6 

1.1 

Velocity  (in.  H20) 

200 

200 

195 

200 

200 

Temperature  (°F) 

24 

0.99 

1.3 

1.5 

1.5 

0.99 

Velocity  (in.  H20) 

195 

205 

200 

200 

205 

Temperature  (°F) 

30 

0  76 

1.1 

1.2 

1.3 

0.90 

Velocity  (in.  H20) 

205 

210 

200 

205 

210 

Temperature  (°F) 

36 

0.64 

0.85 

0.90 

1.0 

0.80 

Velocity  (in.  H20) 

205 

210 

200 

205 

210 

O  V 

Temperature  (  F) 

42 

0.58 

0.65 

0.75 

0.85 

0.64 

Velocity  (in.  H20) 

210 

210 

210 

210 

210 

Temperature  (°F) 

43 

0.49 

0.33 

0.56 

0.65 

0.54 

Velocity  (in.  H20) 

210 

210 

210 

210 

210 

Temperature  (  F) 

54 

0.38 

0.10 

0.28 

0.48 

0.40 

Velocity  (in.  H20) 

210 

210 

210 

210 

210 

Temperature  (°F) 

60 

0.05 

0.10 

0.11 

0.07 

0.05 

Velocity  (in.  H20) 

Average  Temperature  = 

205  °F 

Average  /ip  »  0.855 

The  diffusion  classifier  filters  were  then  weighed  along  with  the 
impactor  stage  substrates.  The  weight  gains  were  calculated  for  each 
particle  collection  stage  and  then  used  to  construct  the  exhaust  gas 
particle  size  distribution.  Several  problems  were  encountered  which  i 
prevented  reliable  size  distribution  data  from  being  generated. 

One  significant  problem  was  filter  material  being  lost  due  to 
sticking  to  the  metal  housing  surfaces.  This  problem  was  most  prevalent 
when  the  stages  were  allowed  to  cool  before  disassembly.  Several 
solutions  were  tried,  including  disassembly  while  hot  and  the  use  of 
teflon^  backup  filters.*  The  teflon^  backup  filters  seemed  to  help, 
but  the  diffusion  classifier  still  required  disassembly  while  hot.  In 
Run  No.  8,  the  diffusion  classifier  was  not  disassembled  while  hot 
because  the  sampling  procedure  was  being  filmed  by  Air  Force  personnel. 

This  was  time  consuming  and  allowed  the  stages  to  cool. 

A  major  problem  encountered  was  the  low  smoke  level  from  the  J75 
engine.  The  largest  filter  weight  gain  was  only  about  0.3  milligram  in 
Run  No.  6,  where  no  filter  sticking  was  in  evidence.  Handling  and 
weighing  precision  checks  completed  during  tfte  second  test  week  showed 
diffusion  classifier  stage  weight  gain  deviation  of  +  0.03  milligram. 
Therefore,  the  largest  measured  weight  gain  was  only  ten  times  the 
variation  due  to  handling,  assembly,  disassembly,  and  weighing.  More 
ideal  stage  weight  gains  would  be  on  the  order  of  1  milligram.  In  an 
attempt  to  reach  this,  the  power  setting  of  the  engine  was  increased 
from  80  percent  to  increase  the  smoke  emissions.  However,  this  increase 
in  power  caused  an  increase  in  the  engine's  operating  temperature  so  the 
sampling  time  could  not  be  extended  and  risk  engine  damage.  During  Run 
No.  8  at  100  percent  power  the  test  had  to  be  shortened  because  the  gas 
temperature  increased  so  much  that  the  water-cooling  jets  were  about  to 
be  activated  (normal  engine  test  procedures) . 

Several  possible  solutions  exist  for  the  low  filter  weight  gain 
problem.  Running  at  a  low  po':er  setting  for  a  very  long  period  would 
increase  the  weight,  but  with  a  substantial  increase  in  fuel  consumption. 

A  different  type  of  test  engine  could  be  used  which  creates  more  smoke. 

One  solution  might  be  to  de-tune  an  engine  specifically  to  create  more 
smoke  for  testing  purposes. 

During  the  second  sampling  trip,  9-11  September  1980,  no  engine  was 
available  for  testing.  However,  it  was  thought  one  would  become  available 
so  the  sampling  team  remained  on  site. 

Quality  control  checks  were  performed  by  the  sampling  team.  Checks 
included:  running  clean,  filtered  air  through  the  diffusion  classifier 
and  determining  the  filter  weight  differences;  repeated  weighings  of 
individual  filters  after  removal;  duplications  -f  filtered  air  runs; 

Cahn  balance  calibration  checks;  and  repeated  simple  assembly-disassembly 
runs  to  check  for  technique  problems.  The  results  indicated  that  the 
technique  of  assembly  and  disassembly  give  filter  weight  change  values 
that  are  +  0.03  rag. 

Finally,  a  run„was  set  up  with  an  absolute  glass  fiber  filter 
preceding  a  teflon^  filter  to  check  the  effect  of  clean,  hot  stack  gas 
on  the  tefon^  filter.  This  run  was  to  be  coupled  to  a  diffusion  classifier 
run  using  only  teflon^  filters  in  the  classifier.  This  check  was  never 
completed  because  a  test  engine  was  not  available. 
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SECTION  III 


TEST  RESULTS  AND  DISCUSSION 


Weight  gain  results  and  other  relevant  data  have  been  tabulated  for 
each  test  run.  This  'inf ormation  is  presented  in  Appendix  B. 

As  stated  in  Section  II,  several  problems  occurred  during  the 
sampling  and  analysis  which  rendered  most  of  the  diffusion  classifier 
data  unusable  for  the  calculation  of  size  distribution.  Of  the  four 
diffusion  classifier  runs  completed,  only  Run  No.  3  yielded  data  which 
could  generate  a  reasonable  distribution.  An  assumed  weight  gain  was 
necessary  for  D.C.  stage  No.  5.  This  allowed  a  distribution  to  be 
calculated. 

Using  weight  gain  information  in  Appendix  B,  calculations  were  made 
for  a  normalized  weight  distribution  within  the  size  intervals  covered 
by  the  impuctor  and  the  diffusion  classifier.  A  cumulative  log  probability 
distribution  was  also  calculated  for  Run  No.  3. 

The  size  distribution  was  calculated  using  the  D  method  for  both 
the  impactor  and  the  diffusion  classifier.  The  valuel  calculated  for 
each  size  interval  are  listed  in  Table  2.  The  normalized  weight  distribution 
values  were  used  to  generate  a  frequency  histogram  (Figure  1) .  The 
cumulative  log  probability  distribution  was  plotted  in  Figure  2. 

Analysis  of  diffusion  classifier  data  by  the  D  method  gives  only 
a  rough  approximation  of  the  size  distribution  of  vlry  small  particles. 

A  more  refined  method  is  being  developed  to  use  a  nonlinear  iterative 
formula.  This  generates  a  distribution  taking  into  consideration  the 
gradual  slope  of  the  diffusion  classifier  size  cutpoint  curve.  The  data 
from  Run  No.  3  was  used  in  a  computer  program  using  this  formula.  This 
program  is  currently  being  examined  and  refined  to  maximize  its  reliability. 
The  distribution  output  and  the  actual  program  used  are  presented  in 
Appendix  C. 

Opacity  measurements  taken  during  sampling  followed  EPA  Method  9 
guidelines  as  far  as  location  of  observer,  location  of  sun,  direction  of 
plume  travel,  etc.  These  measurements  were  not  taken  continuously  at  15- 
second  intervals.  Only  an  approximate  opacity  measure  was  of  interest 
for  this  study.  As  expected,  opacity  tended  to  increase  as  engine 
stress  was  increased,  as  shown  in  Table  3.  This  increase  of  opacity 
coincided  with  an  increase  in  particulate  grain  loading  in  successive 
runs . 

The  size  distribution  of  the  aerosol  in  Run  No.  3,  the  only  reliable 
run.  appears  to  be  bimodal.  The  log  probability  plot  (Figure  2)  shows 
an  S-shape  which  indicates  a  bimodal  condition.  This  is  even  more 
clearly  illustrated  in  the  normalized  histogram  (Figure  1) .  This  figure 
shows  a  major  peak  around  0.1  to  0.2  micrometer  and  a  minor  peak  around 
3  micrometers.  The  large  peak  is  probably  the  primary  combustion  aerosol 
which  is  typically  submicron  in  size  due  to  the  nature  of  origin.  The 
minor  peak  is  probably  due  to  reentrainment  of  particle  agglomerates. 

These  are  usually  larger  than  one  micron  and  few  in  number.  This  produces 
a  significant  fraction  of  weight  in  the  micron  range  of  sizes.  However, 
as  shown  in  Figure  2,  over  80  percent  of  the  aerosol  weight  is  due  to 
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particles  in  the  submicron  range.  Again,  this  is  shown  in  Figure  1 

where  the  area  of  the  histogram  below  one  micron  is  substantially  larger 

than  the  area  above  one  micron.  It  should  be  noted  that  the  ratio  of 

the  area  under  a  given  size  interval  to  the  area  of  the  total  distribution 

is  a  direct  measure  of  the  ratio  of  size  interval  weight  to  total  particulate 

weight.  This  information  is  useful  in  the  design  of  effective  control 

equipment. 

Further  field  work  is  necessary  to  solve  existing  sampling  problems 
as  well  as  discover  and  solve  additional  problems.  Also,  additional 
work  is  needed  on  the  data  reduction  program  for  the  diffusion  classifier 
to  obtain  reliable  and  accurate  distribution  of  submicron  aerosols. 
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TABLE  2.  CALCULATION  RESULTS  FOR  RUN  NO.  3 


P50  (wo) 

Wt  (mg) 

Wt/Vol  (mg/m^) 

A  Wt 

VAlogDp 

%<D 

31 

0.05 

0.14 

0.28 

97 

14 

0.06 

0.16 

0.46 

94 

5.2 

0.03 

0.08 

0.19 

92 

2.6 

0.15 

0.41 

1.36 

83 

1.5 

0.07 

0.19 

0.80 

79 

0.74 

0.07 

0.19 

0.62 

75 

0.38 

0.05 

0.14 

0.48 

72 

1 

0.27  , 

0.15 

0.41 

2.76 

63 

0.14  ' 

0.60 

1.62 

5.68 

29 

0.069 

0.25 

0.68 

2.21 

15 

0.041 

0.15 

0.41 

1.81 

6 

0.01 

0.10 

0.27 

0.44 

3 

Ewt  *  4.70  mg/m 


* 
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TABLE  3.  AVERAGE  SMOKE  OPACITY  READINGS  AT  J75  ENGINE  TEST  CELL 


Process  Rate 


Run  No • 

Percent  Power 

Pounds/hr . 

Average  Opacity  0b: 

1 

80 

3000 

NA 

2 

80 

3000 

5 

Black 

3 

80-90 

4980 

15 

Black 

4 

90 

NA 

NA 

5 

95 

7500 

NA 

6 

95 

7500 

25 

Black 

7 

100 

12000 

32 

Black 

8 

100 

12000 

27 

Black 

NA  =  Not  Available 
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RTICLE  DIAMETER  Dp  (^m) 
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APPENDIX  A 

DIFFUSION  CLASSIFIER  ASSEMBLY  PROCEDURE 


Figure  A-l(a)  shows  the  major  sections  of  the  diffusion  classifier. 

The  following  diffusion  classifier  assembly  procedure  is  recommended: 

1.  Clean  all  surfaces  thoroughly. 

2.  Clean  orifices  in  acetone  or  other  solvent  and  make  sure  they  are 
not  plugged.  The  orifices  should  not  require  frequent  cleaning.  Yet, 
they  should  at  least  be  checked  after  each  ten  hours  of  operation.  It 
is  a  good  practice  to  occasionally  check  their  calibration. 

3.  Apply  a  high  temperature  lubricant  to  all  threaded  parts  if  operating 
conditions  warrant  it.  Care  must  be  taken  in  applying  the  lubricant  to 
the  various  diffusion  classifier  stages  and  orifices.  This  helps  reduce 
filter  sample  contamination  and  plugging  of  orifices  by  the  residues  of 

the  high  temperature  lubricant  after  the  volatile  components  have  vaporized. 

4.  Thread  the  orifices  snugly  into  the  Swagelok  fittings  and  the 
Swagelok  fittings  into  the  base.  To  avoid  problems  at  elevated  temperatures, 
do  not  overtighten  the  fittings  in  the  base  [Figure  A-l(b)]. 

5.  Precondition  five  filters  in  an  environment  as  similar  as  possible 
to  that  being  sampled,  and  choose  filters  with  temperature  limits 
compatible  with  that  of  the  gas  being  sampled.  Weigh  these  filters  and 
record  their  weights. 

6.  Place  the  filter  over  the  perforated  plate  and  fine  mesh  screen 
filter  support,  and  then  place  the  seal  ring  on  top  of  the  filter  in  the 
bottom  section  of  each  diffusion  classifier  stage.  Filters  must  be 
handled  carefully  to  keep  spurious  weight  losses  or  gains  to  a  minimum. 

Place  clean,  unplugged  screens  in  the  top  section  of  each  stage,  and 
then  insert  the  retaining  ring.  Avoid  using  sharp  instruments  like 
screwdrivers  in  this  operation  because  of  the  risk  of  damaging  the 
screens.  Now  assemble  the  top  and  bottom  sections  of  each  of  the  five 
stages  [Figures  A-l(c),  (d) ,  and  (e) J .  Stage  No.  5  has  no  screens,  and 
stage  No.  4;  No.  3,  No.  2,  and  No.  1  have  5,  10,  20,  and  36  screens, 
respectively.  The  number  of  screens  can  be  varied  as  needed.  To  check 
for  screen  plugging,  use  a  low  power  microscope.  If  a  significant  buildup 
is  observed,  the  screens  should  either  be  replaced  or  cleaned  and  reused. 
Frequency  of  cleaning  depends  on  the  operating  conditions.  As  a  general 
rule,  the  screens  at  the  upstream  end  should  be  checked  after  every 
test.  At  the  first  sign  of  plugging,  the  screens  should  either  be 
cleaned,  or  the  first  few  screens  from  the  upstream  end  should  be  replaced. 
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7.  Attach  the  diffusion  classifier  stages  to  the  base  in  the  following 
order: 

a.  Stage  No.  5  is  secured  to  Swagelok  fitting  No.  5  at  the  center 
of  the  base  [Figure  A— 1(f) ] . 

b.  Stage  No.  4  and  No.  3  are  secured  to  their  respective  fittings; 
No.  4  and  No.  3  are  located  directly  opposite  each  other 
[Figure  A-l(g) ] . 

c.  A  similar  procedure  is  followed  with  stage  No.  2  and  No.  1 
[Figure  A- 1(h) ] . 

8.  Secure  the  cylindrical  casing  and  inlet  section  in  place.  The 
diffusion  classifier  is  now  ready  for  sampling  [Figure  A-l(i)]. 
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(a)  The  major  sections  of  the 
diffusion  classifier 


,  i 

(b)  Orifice,  Swagelok  fitting,  and 
base  assembly 


Figure  A-l.  Diffusion  Classifier  Assembly  Procedure 


(e)  Diffusion  Classifier  Stage 
fully  assembled 


(d)  Diffusion  Classifier  Stage 
partially  assembled 


(c)  Diffusion  Classifier  Stage 
completely  disassembled 


Figure  A-l.  Diffusion  Classifier  Assembly  Procedure  (Continued) 


(f)  Assembly  of  diffusion  classifier  (g)  Assembly  of  diffusion 

stage  No.  5  to  Swagelok  fitting  classifier  stages  No.  4  and 

No.  5  No.  3  to  Swagelok  fittings 

No.  4  and  No.  3 


(h)  Assembly  of  diffusion  classifier  (i)  Diffusion  classifier  fully 
stages  No.  2  and  No.  1  to  assembled 

Swagelok  fittings  No.  2  and  No.  1 


Figure  A-l.  Diffusion  Classifier  Assembly  Procedure  (Concluded) 


APPENDIX  B 


RUN  DATA  SHEETS  WITH 


WEIGHT  GAIN  RESULTS 


r 


I 


I 

! 


I 

1 

Field  Data  Run  No.  1  j 


SAMPLING  CONDITIONS: 


TEST  LOCATION  lyrui  ill  Air  Force  Base 

J75  ?17  Engine  Test  Ceil 

TEST  TYPE_j;~^dct0l-/flj_r-t-li,3ijn  class  i  f  i  ,-r 

Temperature  ,  k  (7!  sv, 

Pressure  ambient 

DATE 

temper  2, 

1980 

Ho0  concentration  3.11 

TIME 

_ 145,0.. 

Molecular  weight  29 

SAMPLED  VOLUME  ^ 

Zap  DSCF 

Sampled  volume  16.37  acf 

PROCESS  RATE  80% 

Power  3000# /hr 

• 

Sampling  time  30  min 

PARTICULATE  WEIGHT 

GAIN 

Impactor : 

University  of  Washington 

Coating:  Apiezon  L 

Stage 

Initial 

Final 

Weight 

Cutpoiac 

Weight 

Weight 

Gain  AW/VA  Log  d 

Stage 

Q) 

(‘T>g) 

(mg)  (mg/m3)  p 

1 

31 

666 . 63 

866.63 

0.00 

id 

974.66 

974.75 

0.09 

3 

5.2 

970.95 

970.92 

-0.03 

•4 

2,6 

979.99 

979.97 

-0.02 

5 

1.5 

989.50 

989.45 

-0.05 

6 

0.74 

1007. SO 

1007.74 

-0.06 

7 

0.38 

988.89 

988.85 

-0.04 

tOZ  Su.2  t  : 

0.38  tm) 

'  ‘as 

<"  x±si? i u 

r:  A 

Filter 

Media  •'  Glass  Fiber 

Stage 

Initial 

Final 

Weight 

uU  3  0  »  ..  . 

Weight 

Weight 

Gain  AW/VA  Log  d 

Sc  j  ; 

V  .■ _ 

(,mg) 

(mg) 

(mg)  (mg/m3)  ^ 

i 

0 , 2  7 

139.55 

139.76 

0.21 

0.1- 

1*40  .  iL  -r 

140.31 

0.07 

0.089 

139.32 

139.-0 

0.14 

.  -r .  .i : 

140. 12* 

0.00 

3 

<0.0-1 

!-'•  0 . 0  5 

140. 22 

0.17 

Di t . us 

ion  Bt 

rv  Sum  0.38 

~m) 

0.85 

1C iAL  weight  collected  ia  run 


-r  ion 


orna!i  j mount  of  this  filter  stuck  during  removal. 
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Field  Data  Run  No.  2 


TEST  LOCATION  Tyndall  Air  Force  Ba6e 

TEST  TYPE _ Single.  Hi  gh-p-f  f  i  r  ienry  f  jl  t  p.t 

DATE  September  3,  1980 

TIME 


SAMPLING  CONDITIONS: 
Temperature  frS3°R  (193JF) 
Pressure  ambient 


I^O  concentration  2.6% 


0910 


Molecular  weight_ 


30 


SAMPLED  VOLUME  16.20  SCF _ 

PROCESS  RATE  80%  Power  3000^/hr. 


Sampled  volume  20.80  acf 
Sampling  time _ 20  min 


PARTICULATE  WEIGHT  GAIN  Gelman  Filter 


Impactor: 

Coating : 

Stage 

Stage 

Cutpoint 

(Mm) 

Initial 

Weight 

(mg) 

Final 

Weight 

(mg) 

Weight 

Gain 

(mg) 

AW/VA  Log  d 
(mg/m3)  P 

1 

2 

3 

4 

5 

6 

7 

137.26 

138.13 

0.87 

Diffusion 

Classifier: 

Coating: 

Stage 

Stage 

Cutpoint 

(Mm) 

Initial 

Weight 

(mg) 

Final 

Weight 

(mg) 

Weight 

Gain 

(mg) 

AW/VA  Log  d 
(mg/m3) 

1 

2 

3 

4 

5 

TOTAL  weight  collected  in  run 

mg 

Concentration 

1.898  mg/ ds  cm 

3 

grains/ dscf 

*Note: 

This  filter 

ran  immediat 

elv  prior 

to  Run  No,  3  during  same  engine 

field  Dat3  :<un  Nu.  3 


SAMPLING  CONDITIONS: 


TEST 

LOCATION  Tyndall  Air  Force 

lid  S  <_ 

Temperature  676'' R  < 218  F 

TEST 

TYPE  Impactor/D. B. 

Pressure  arr 

:bient 

DATE 

Septeraoer  j, 

1980 

H.,0  concentration  2.  oX 

TIME 

09  35 

Molecular  weight  29 

SAMPLED  VOLUME  13.1 

/4  DSCF 

Sampled  volume 

17.61  ac  f 

PROCESS  RATE  30-90' 

4980?;/hr 

Sampling  time 

30  niin 

PARTICULATE  HEIGHT  GAIN 

Impactor:  University 

•  of  Washingt 

on 

Coating:  Apicz 

on  L 

Stage 

Initial 

F  inai 

Weight 

Cutpoint 

Weight 

Weight 

Gain 

AW/VA  Log 

d 

Stage 

(pm) 

(“8) 

(mg) 

(mg) 

(mg/m3) 

P 

1 

31 

680.73 

680. 78 

0.05 

0.2S 

2 

J.— 

975.39 

975.45 

0.06 

0.46 

0 

5.2 

981.27 

981.30 

0.03 

0.19 

-4 

2.6 

986.22 

986. 37 

0.15 

1.36 

5 

1.5 

991.45 

991.32 

0.07 

0.80 

6 

-i 

J  .  /  >* 

995.98 

996.05 

0.06 

0.62 

7 

0.38 

979.52 

979.57 

0.05 

0.48 

- 

«i  '.  ,0  '  oL  {  -0  . 

38  _m) 

0.43 

■  s  i :  i  e  r : 

A 

Filter 

Mecia  :  Glass 

Fiber 

Stage 

illi  v-j-u  x 

Final 

Weignt 

Catpo  -  ‘ 

we ight 

Weight 

Ga  in 

AW/VA  Log 

d 

S  t  a  n 

C  Jm'1 

(mg) 

(mg) 

(mg) 

(mg/m3) 

P 

1 

0 . 

139.57 

139.60 

0.03 

2.76 

(.»  .  -r 

138 . 38 

138.53 

0.15 

5.68 

0 . 0o-j 

140. 71 

x^G . 9 I 

0.20 

2 . 21 

u 

0 . 04  . 

137. *6 

138.19 

0.23 

1.81 

- 0 . Oh  1 

xwC . 18 

140.20 

o.n 

1.2bK  ' 

0.44 

diffusion  CLa.ssif 

ier  Sura  (  u. 

33  ..ra) 

TOTAL 

weight  ccllecte 

d  in  run  1 

•73  mg 

Cone  -ion  ro c  ion. 

9 ■ 69mg/dscm 

3 

_ grains/dscf 

(I;  :  Filters  stuck  to  both  steel  backing  plate  and  spacing  rings  in  ail 
D.C.  sc  ages. 

(2):  As. siiiacd  valu-  .  Stage  5  weight  gain  in  error  Therefore: 
assumed  -  0.25  mg  Total  gain  of  5  x  0.25  =  1.25 
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Field  Data  No.  4 


SAMPLING  CONDITIONS: 


TEST  LOCATION  Tyndall  Air  Force  Ease  Temperature  677°R  (217°F) 


TEST  TYPE  Single  high-efficiency 

filter 

Pressure  ambient 

DATE _ 

September 

3,  1980 

H„Q  concentration  3.2% 

TIME _ 

1408 

z  _ 

Molecular  weight  30 

SAMPLED 

VOLUME 

8.52  SCF 

Sampled  volume 

12.04  acf 

PROCESS 

RATE  90% 

Power 

Sampling  time 

10  min 

PARTICULATE  WEIGHT 

GAIN:  Gelman  Filter 

Impactor: 

Coating : 

Stage 

Initial 

Final 

Weight 

Cutpoint 

Weight 

Weight 

Gain 

AW/VA  Log  d 

Stage 

(pm) 

(®g) 

(mg) 

(mg) 

(mg/m3)  P 

1 

2 

3 

4 

138.53 

139.08 

0.55 

Diffusion  Classifier: 

Coating: 

Stage  Initial 

Final 

Weight 

Cutpoint  Weight 

Weight 

Gain 

AW/VA  Log  d 

Stage  (pm)  (mg) 

(mg) 

.  fog) 

(mg/m3) 

1 

2 

3 

4 

5 

TOTAL  weight  collected  in  run _ mg 

3 

Concentration  2 . 28lmg/dscm  _ 

_ grains/dscf 


*Note:  This  filter  run  immediately  prior  to  Run  No.  5  during  same  engine 
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Field  Data  Run  No.  3 


TEST  LOCATION  Tvndali  Air  Force  Base 


SAMPLING  CONDITION'S: 
Temperature  i R  ilia  F) 


TEST  TYPE  Single  high 

-ef tic  Lency 

1  liter 

Pressure  ambient 

DATE 

September  3, 

1980 

H^O  concentration  3.2% 

TIME 

1436 

z 

Molecular  weight  30 

SAMPLED 

VOLUME  8.45 

DSCF 

Sampled  volume  12.28  acf 

PROCESS 

RATE  9  5/1  Power 

750Qr? /hr .  , 

Sampling  time  10  mm 

PARTICULATE  WEIGHT  GAIN 

:  Gel man 

Filter 

Impactor : 

Coating: 

Stage 

Stage 

Cutpoint 

((am) 

Initial 

Weight 

(m3) 

Final 

Weight 

(mg) 

Weight 

Gain  AW/VA  Log  d 

(mg)  (mg/m3)  P 

1 

141.64 

142.52 

0.88 

f fusion 


Si 


Laso'.t  ler: 

Stage 

Cutpo.. 

(pm) 


Weight 

(mg) _ 


Final 

Weight 

(mg) 


Coating: 

Weight 

Gain 

(mg) 


AW/VA  Log  d 
(mg/m3)  P 


TOTAL  weight  collected  in  run 


mg 


j.&aOmg/dscm  3 


grains/dsef 


*Note:  This  filter  run  immediately  prior  to  Run  No.  6  during  same  engine  test. 
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Field  Data  Run  No.  6 


TEST  LOCATION  Tydall  Air  Force  Base 

TEST  TYPE  Impactor/D.B. _ 

DATE  September  3,  1980 _ 

TIME _ 1439  _ 

SAMPLED  VOLUME  12,49  SCF _ 

PROCESS  RATE  95%  Power  7500///hr. 

PARTICULATE  WEIGHT  GAIN 
Impactorr  University  of  Washington 


Stage 

Stage 

Cutpoint 

(Mm) 

Initial 

Weight 

(mg) 

Final 

Weight 

(mg) 

Weight 

Gaia 

(®s) 

1 

31 

966.69 

966.70 

0.01 

2 

14 

974.85 

974.69 

-0.16 

3 

5.2 

971.05 

971.00 

-0.05 

4 

2.6 

980.08 

980.03 

-0.05 

5 

1.5 

989.54 

989.51 

-0.03 

6 

0.74 

1007.81 

1007.86 

0.05 

7 

0.38 

988.95 

988.93 

-0.02 

SAMPLING  CONDITIONS: 
Temperature  690CR  (230'F) 

Pressure  ambient _ _ 

H^O  concentration  3.2% 

Molecular  weight _ 30 _ 

Sampled  volume  17.50  acf 
Sampling  time  30  min 

Coating:  Apiezon  L 


AW/VA  Log  d 
(mg/m3)  p 


Impactor  Sum  (>0.38  pm) 
Diffusion  Classifier:  A 


Stage 


Stage 

Outpoint 

(Mm) 


0.27 
0.14 
0 ;  069 
0.041 
<0.041 


Initial 

Weight 

(mg) 


141.63 

135.39 

138.85 
139.14 

135.86 


Filter  Media  ’.Glass  fiber  filters  with 

teflon®  backup  filters  and 
Final  Weight  spacing  ring  liners. 

Weight  Gain  AW/VA  Log  d 

(mg)  (mg)  (mg/r3' _ p 


141.56 

135.55 

138.98 

139.45 

136.06 


Diffusion  Classifier  Sum  (<0.38  pm) 
TOTAL  weight  collected  in  run _ mg 


-0.07 

0.16 

0.13 

0.31 

0.21 

1.05 


Concentration 


mg/dscm _ 

_ grains /dscf 


*Note:  Teflon  filters  weighed  separately  before  and  after  run  wit..-.  ,.vt ran 

weight  change  =  0.022  mg. 
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Field  Data  Run  No.  7 


TEST  LOCATION  Tyndall  Air  Force  Base 

TEST  TYPE  Single  hi-ef f iciency  filter 

SAMPLING  CONDITIONS: 

Temperature  798  K  (.338  t) 

Pressure  ambient 

DATE  September  4, 

1980 

H^0  concentration  4.0% 

TIME  0825 

Molecular  weight  30 

SAMPLED  VOLUME  8 

13  DSCF 

Sampled  volume 

13.06  acf 

PROCESS  RATE  100% 

Power  12000# /h 

r . 

Sampling  time 

10  min 

PARTICULATE  WEIGHT 

GAIN  ••  Gelman 

Filter 

Impactor : 

Coating: 

Stage 

Initial 

Final 

Weight 

Outpoint 

Weight 

Weight 

Gain 

AW/VA  Log  d 

Stage  (pm) 

(mg) 

(mg) 

(mg) 

(mg/m3)  P 

1 

140.05 

142.82 

2.77 

2 

3 

4 

5 

6 

7 

Coating: 

Stage 

Initial 

Final 

Weight 

Cutpoinr 

Weight 

Weight 

Gain 

AW/VA  Log  d 

Stage  'ism) 

(mg) 

(mg) 

(mg) 

(mg/m3)  p 

i 

3 

a 

c 

TOTAL  weight  collet 

:ted  La  run 

m8 

3 

: (oncentrat  ion  l2.0  39  mg/dscm _ 

_ grains/dscf 

Note:  This  filter  run  immediately  prior  to  Run  No.  8  in  same  engine  test. 
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Field  Data  Run  No.  S 


SAMPLING  CONDITIONS: 


TEST  LOCATION  Tyndall  Air  Force  Base  Temperature  806°R  (3463F) 

TEST  TYPE  Impactor/D.B.  Pressure  ambient 


DATE  September  4,  1980 _ 

TIME  0848 _ 

SAMPLED  VOLUME  5.89  SCF _ 

PROCESS  RATE  100%  Power  12000# /hr. 


H^O  concentration  4.0% 

Molecular  weight  30 _ 

Sampled  volume  9.86  acf 
Sampling  time  15  min 


PARTICULATE  WEIGHT  GAIN 

Impactor:  University  of  Washington  Coating:  Glass  Fiber  Substrates 


Stage 

Initial 

Final 

Weight 

Cutpoint 

Weight 

Weight 

Gain 

AW/VA  Log  d 

Stage 

(pm) 

(ms) 

(mg) 

(mg) 

(mg/m3)  p 

1 

31 

841.29 

841.33 

0.04 

2 

14 

1228.88 

1229.41 

0.53 

- 

3 

5.2 

1232.21 

1232.25 

0.04 

- 

4 

2.6 

1228.72 

1228.74 

0.02 

- 

5 

1.5 

1215.77 

1215.84 

0.07 

- 

6 

0.74 

123040 

1230.46 

0.06 

- 

7 

0.38 

1225.99 

1226.16 

0.17 

- 

Impactor  Sum  (>0.38  pm) 

0.93 

Diffusion 

Classifier 

:  A 

Filter  HedinjU. Glass 

Fiber  Filter  with 

teflon^  Backup 

filter  and  teflon 

Stage 

Initial 

Final 

Weight  ring 

liners . 

Cutpoint 

Weight 

Weight 

Gaia 

AW/VA  Log  d 

Stage 

(mg) 

(mg) 

(mg) 

(mg/m3)  P 

1 

0.27 

317.16 

317.14 

-0.02 

2 

0.14 

321.69 

321.58 

-C.  11 

- 

3 

0.069 

318.52 

318.47 

.05 

- 

4 

0.041 

322.90 

323.11 

0.21 

- 

5 

<0.041 

318.61 

318.78 

0.17 

- 

Diffusion  Classifier  Sum  (<0. 

38  urn) 

0.85 

TOTAL  weight  collected  in  run _ mg 


Concentration  _ mg/dscm _ 

_ grains/dscf 

*Note:  Glass  fiber  and  teflo^^ilter  parts  weighed  simultaneous! v . 
Note:  Glass  fiber  filter  stuck  to  ring  because  it  wasn't  untighte-ieu 
while  hot. 


APPENDIX  C 

PET  COMPUTER  PRINTOUT  AND  PROGRAM  FOR 
DIFFUSION  CLASSIFIER  DATA  REDUCTION 
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FLOW  IN  L/M I H=  12.0 
TEMPERftTURE  IN  KELV I N=  375 
TOTAL  PRESSURE  IN  MM  HG=  7 SO 


SCREENS 

SCREENS 

SCREENS 

SCREENS 


ST  HUE  4=  5 
STAGE  3=  10 
STAGE  2=  20 
STAGE  1=  36 


ASSUME  INPUT  WEIGHT  ON  STAGE  5=100*; 


WT 

ON 

STAGE 

4= 

62. 

,  4S’8'46 1 6 

WT 

ON 

STAGE 

•-‘  = 

44. 

i  5076020 

WT 

ON 

STAGE 

26. 

,  6023077 

WT 

ON 

STAGE 

i  = 

15. 

,  2007602 

READY. 

10  DIM  DC<5> RA<5> 

2  O  D I M  C  H  ( 2  0  >  .*  I>  X  <  5  >  ..  D  P  <  5 ..  2  0  >  ..  C  C  <  5  ;* 

SO  D I M  SZ  (  20  )  P  ( 5 . 20  >  ,  C  ( 5 ) ,  PC  <  20  >  ..  PL  ( 26  )  ,  F’K  <  20  ) 

40  INPUT  "FLOW  IN  L/'MIN=" ,  Q 

50  INPUT  “TEMPERATURE  IN  KELVIN=‘‘,T 

60  INPUT  "TOTAL  PRESSURE  MM  HG=",P 

70  INPUT  " SCREENS  STAGE  4=",W 

80  INPUT  "SCREENS  STAGE  3*";X 

00  INPUT  "SCREENS  STAGE  2=";V 

100  INPUT  "SCREENS  STAGE  1=";Z 

110  REM  NZ  IS  THE  NUMBER  OF  SIZE  CLASSES 

120  NZ=14 

100  REM  INITIALIZATION  OF  SIZE  CLASSES 
140  SZ(  1  :.'=5. 0E-O7 
70  FOR  1=2  TO  NZ 
1  FT  SZ*:'  ;  >-  SZv  1-1  >*1.452134 
1 7 -J  NEXT  I 

i  rem  CALC  VISCOSITY 
ISO  T5  =  Tt!.5 
200  T  7 = . O 6 S  * T t  7 . 3 
21  •:  V4=T5/V? 

22"  V4=v'4*  ?.  .  OE-06 

230  REM  CALC  GAS  DENSITY 

34u  T4=4. 64550c. C.-U4 

250  A4=T4*P,  'T 

260  REM  CALC  MEAN  FREE  PATH 

270  RN=0 . 70 1 04E-O4 

280  TN=.49?*R4 

200  L  B=  <  V4*:RN/TN  >  /T  T.  5 

'■'0  "OF  !  =  l  TO  NZ 

...  ’EM  UAL*:  CUNNINGHAM  'S  CORRECTION 

020  TE=2. t.B/SZi I > 

000  SL=-.55#SZ<I.:*/LB 
•S‘40  r ' R=  1 .  d57+.  4+-EXP < SL > 

050  CE=1.+TE*KR 

260  REM  CALC  DIFFUSIVITV 
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370  BI=1.371E-16*T*CE 
380  BA=9. 4247777* V4*SZ< I > 

390  DF =£1 /BA 

400  REM  CALC  F'ECLET  HUMBER 

4 1 0  QU= . 1 253333333*0 

420  00=45. 603673*DF 

430  R5=-3. 81 

440  G5=- . 59 

450  RP=R5* < QU/QO  > 105 

460  IF  RPC-2. 1  THEN  RP=-2. 1 

470  REM  CALC  PENETRATIONS  BASEL  ON  RANGARAJ  CAL  I BRAT I  OH  EQUATION 
480  pa, i>=i. 

490  WR=W*RP 

500  P  C  2 , 1 > =EXP i WR > 

510  XR=X*RP 

520  P  < 3 , 1 >  =EXF  < XR > 

530  VR=V*RP 

540  P<4, 1  >=EXP<VR> 

550  ZR=Z*RP 

560  P  <.  5 , 1  =EXP  (  ZR  > 

578  NEXT  I 

580  REM  HA  IS  THE  HUMBER  OF  STAGES 
598  HA=5 
600  NT =Nft- 1 
610  VV=V 

620  FOR  J=1  TO  HZ 

630  REM  CALC  DIFFERENCES  IN  PENETRATION 

640  FOR  1=1  TO  NT 

650  DP  < I , J > =P< I , J ) -P  a + 1 , J  > 

668  NEXT  I 

670  DP  < HA , J >  =P  < HA , J > -0 
680  NEXT  J 

690  REM  FOR  EACH  STAGE  FINDS  MAXIMUM  VALUE  OF  DP 

708  FOR  1=1  TO  HA 

710  DX< I >=0. 0 

728  FOR  J=1  TO  HZ 

730  IF  DX<I>>DPCI, ,T>  GOTO  790 

740  Dxa>=DPa, j> 

750  DH= 1 . 0E+30 ; DL= 1 . OE-30 
7 60  V=3GN v  DX  ( I  >  >  '■  DA= ABS  < DX  <  I  >  > 

770  IF  DA<=DL  THEN  DX(I>=V*HL 
780  IF  DA>DH  THEN  DX<I>=V*DH 
790  NEXT  J 
800  NEXT  I 


810 

REM 

INPUT 

STAGE 

WEIGHTS 

820 

INPUT 

"WT 

ON 

STAGE 

5="  ;ca 

830 

INPUT 

”WT 

ON 

STAGE 

4=" ;C<2 

840 

INPUT 

”WT 

ON 

STAGE 

3=";C<3 

850 

INPUT 

"WT 

ON 

STAGE 

2=" ; C  < 4 

860 

INPUT 

"WT 

ON 

STAGE 

1=" ;C(5 
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:.'JhL.  IHITIhL  WEIGHT  TO  EACH  SIZE  CLfi 


u  ye  SM=e. 

1130  FOR  J=1  TO  HZ 
1200  SM=SM+PC(.J> 

1210  NEXT  ,T 
1220  FOR  J=1  TO  HZ 

1 230  PK  <  J  >  =  I  NT  ( PC  ■:  J  >  *  1  SO*  1 0O/SM  >  / 1 GO 
1 240  PC  <  J  >  =  I  NT  <  PC  <  ,T  >  *  1 00*C  (  1  >  ,  'SM  >  / 1 OO 
1250  NEXT  J 
1260  LET  R=NZ-1 
1 270  PL  < HZ  >  =  1 00-PK < HZ  > 

1230  FOR  J=1  TO  R 
1 230  PL  <  HZ- J )  =PL  C  HZ- J+ 1  >  -PK  C  HZ- J  ) 

1300  NEXT  J 
1310  OPEN  1,4 
1320  CMH  1 

1 330  PR  I  NT  CHRf  •:  1  > "  D I FFUS I  ON  CLASS  I F I ER " 

1340  PRINT : PRINT : PRINT 
1350  T$="DIA  WT  ’KB  I  A" 

1360  PRINT  CHR$ <  1  > Tf  :■  CHR$ (  1 23 > ThE < 5 :>  :■  GOSUB2040  PRINT 
1370  PRINT  "(MICRON) 

1380  OPEN  3,4,2 

1330  OPEN  2,4,1 

1400  FOR  J=1  TO  HZ 

1410  11=25. #PC ( J > / 1 00 . + . 5 

1420  IF  I I <=25  GOTO  1440 

1430  11=25 

1440  P,T=PC(J> 

1450  F‘L=PL  (  J  ) 

1 460  SJ=SZ < J  >  * 1 . OE+0? 

1470  PL= < I NT  < 1 0O*PL >  >  X 1 00 
1 438  S J= < I NT  <  S J# 1 22 . 6067 > ) / 1 QO 
1430  SJ=SJ/1000 

1500  PR I NT #3, "Z.  333  33.33  33.33" 

1510  PRINT#2,3J;PJ;PL; 

1 520  PR I NT# 1 , "  I " ;  : G0SUB2 110- PR  I NT# 1 

1530  NEXT  J 

154G  CLOSE  2 

1550  OPEN  4,4 

1560  CML  4 

1570  PRINT  CHR$ (1 > "OBSERVED  " ;  = GOSUB2210  “PINT 
1580  FOR  1=1  TO  HP 

1530  REM  CHRNGES  RftW  STRGE  WEIGHTS  TO  PERCENTS 
1 600  CP < I ) =C<I)*1 00/C < 1 > 

1610  REM  COMPUTES  “CALCULATED"  CUMULATIVE  WEIGH-  OH  STAGES 
1620  CC(I)=0.0 
1630  FOR  J=1  TO  HZ 
1 640  CC ( I >  =CC ( I ) +P  < I , J >  *PC ( J > 

1650  NEXT  J 

1660  REM  CALC  LOGRATIO 

1 670  RA  <  I  >  =LQG<  C  <  I  ) /CC  ( I  >  >  .  '2 .  302585 
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1 630  S1=S1+RR<DT2 
1690  NEXT  I 

1 700  PR  I  NT  CHR$  <  1  >  "  CALCULATED  " ;  :  GQSUB2250  •’  PR  I  NT 

1710  PR  I  NT "  LOGRfiT  1 0  " :  GOSUB2309  :  PR  I  NT 

1720  REM  CALC  RMSE  BETWEEN  "OBSERVED"  AND  "CALCULATED" 

1730  RM=SQR<S1/NA> 

1740  REM  CALC  MMD  AND  GEO  STD  DEV 
1750  81=0. : 82=0 . 

1760  FOR  J=1  TO  NZ 

1770  8 S=L 0 G ( S Z (. J ) ) 

1 780  8 1  =S  1  +SS*PC  '■  J  > 

1 790  S2=S2+SS*SS*PC < J > 

1800  NEXT  J 

1810  si=si/cca> 

1820  S2=S2/CC(1> 

1 830  S2-SQR C 82-8 1*81 > 

1340  S1=EXP<S1> 

1850  8 2= EXP < 82  > 

I860  81=81*1 . 8E+04 

1870  PRINT  " RMSE= " ; RM 

1880  PRINT  CHR$ ( 1 > " GEO  MEAN  DIA=";S1 

1890  PRINT  CHR$Cl)"GEO  STD  DEV=";S2 

1900  PRINT  :  PRINT.:  PRINT  - 

1910  PR I NT  " FLOW  I N  L/M IN=" ; Q 

1920  PRINT  "TEMPERATURE  IN  KELVIN=";T 

1930  PRINT  "TOTAL  PRESSURE  IN  MM  HG=";P 


1948 

PRINT 

"SCREENS 

STAGE 

4=" 

w 

1 950 

PRINT 

"SCREENS 

ST  AGE 

3=". 

•  X 

1 960 

PRINT 

"SCREENS 

STAGE 

vv 

1970 

PRINT 

"SCREENS 

STAGE 

T="! 

z 

1980 

PRINT 

"ASSUME 

INPUT  WEIGHT  ON  STAGE 

PRINT 

"X  WT  ON 

STAGE 

4=" 

CP<2> 

2000 

PR  1  NT 

"X  WT  ON 

STAGE 

CP  <  3  > 

•I*  C*  “i 

1 '  ' 

PRINT 

"X  WT  ON 

STAGE 

—  H 
w  "" 

CP  <  4  > 

262Q 

PRINT 

"X  WT  ON 

STAGE 

1=" 

CP  <  5  > 

2036 

GOTO  '1 

340 

2040  PRINT"  +  ".; 

2050  FOR  1=1  TO  25 
2O60  F$=" . "  ■ 

2G70  IF  1/5= I NT < 1/5)  THEN  F$="+" 
2080  PRINT  F$j 
2090  NEXT  I 
*  2100  RETURN 
2110  AA= I NT (II) 

2120  PR I NT# 1," 

2130  IF  AAC1  THEN  GOTO  2190 
2140  FOR  1=1  TO  AA 
2150  G *•=’•#" 

2160  IF  I/5=INT<I/5)  THEN  G$="0" 


31 


2179 

PR I NT# 1 , 

Of 

218Q 

NEXT  I 

2190 

PR  I NT# 1, 

"#" , 

2280 

RETURN 

2210 

FOR  1=1 

TO  NR 

2220 

PRINT  C< 

I  > 

2230 

NEXT  I 

2240 

RETURN 

2250 

FOR  1=1 

TO  NR 

2260 

CO=< I NT  < 

10*CC< I 

2270 

PRINT  CO 

i; 

2280 

NEXT  I 

2290 

RETURN 

2300 

FOR  1=1 

TO  NR 

2318 

PRINT  RR 

2320 

NEXT  I 

2330 

RETURN 

2340 

PRINT #4 : 

CLOSE  4 

2350 

END 

